home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-04 / smalltlk.zip / PRELUDE / STRING.P < prev    next >
Text File  |  1990-09-13  |  3KB  |  103 lines
  1. temp <- <primitive 110 22 >
  2. <primitive 112 temp 1        " sameAs: " \
  3.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 102 248 4 242 \
  4.  32 10 19 243 245] \
  5.     #(  ) ) >
  6.  
  7. <primitive 112 temp 2        " size " \
  8.     #( #[ 32 250 1 100 243 245] \
  9.     #(  ) ) >
  10.  
  11. <primitive 112 temp 3        " printNoReturn " \
  12.     #( #[ 32 250 1 120 242 245] \
  13.     #(  ) ) >
  14.  
  15. <primitive 112 temp 4        " print " \
  16.     #( #[ 32 250 1 121 242 245] \
  17.     #(  ) ) >
  18.  
  19. <primitive 112 temp 5        " printString " \
  20.     #( #[ 32 250 1 109 243 245] \
  21.     #(  ) ) >
  22.  
  23. <primitive 112 temp 6        " printAt: " \
  24.     #( #[ 32 33 10 49 33 10 50 250 3 126 242 245] \
  25.     #(  ) ) >
  26.  
  27. <primitive 112 temp 7        " new: " \
  28.     #( #[ 33 250 1 115 243 245] \
  29.     #(  ) ) >
  30.  
  31. <primitive 112 temp 8        " deepCopy " \
  32.     #( #[ 32 250 1 107 243 245] \
  33.     #(  ) ) >
  34.  
  35. <primitive 112 temp 9        " copyFrom:length: " \
  36.     #( #[ 32 33 34 250 3 106 243 245] \
  37.     #(  ) ) >
  38.  
  39. <primitive 112 temp 10        " copyFrom:to: " \
  40.     #( #[ 32 33 34 33 193 81 192 250 3 106 243 245] \
  41.     #(  ) ) >
  42.  
  43. <primitive 112 temp 11        " compareError " \
  44.     #( #[ 32 48 188 243 245] \
  45.     #( 'strings can only be compared to strings'  ) ) >
  46.  
  47. <primitive 112 temp 12        " at:put: " \
  48.     #( #[ 32 33 34 250 3 105 242 245] \
  49.     #(  ) ) >
  50.  
  51. <primitive 112 temp 13        " at: " \
  52.     #( #[ 32 33 250 2 104 243 245] \
  53.     #(  ) ) >
  54.  
  55. <primitive 112 temp 14        " asSymbol " \
  56.     #( #[ 32 250 1 108 243 245] \
  57.     #(  ) ) >
  58.  
  59. <primitive 112 temp 15        " asFloat " \
  60.     #( #[ 32 250 1 165 243 245] \
  61.     #(  ) ) >
  62.  
  63. <primitive 112 temp 16        " asInteger " \
  64.     #( #[ 32 250 1 164 243 245] \
  65.     #(  ) ) >
  66.  
  67. <primitive 112 temp 17        " > " \
  68.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 204 248 \
  69.  4 242 32 10 19 243 245] \
  70.     #(  ) ) >
  71.  
  72. <primitive 112 temp 18        " >= " \
  73.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 203 248 \
  74.  4 242 32 10 19 243 245] \
  75.     #(  ) ) >
  76.  
  77. <primitive 112 temp 19        " <= " \
  78.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 200 248 \
  79.  4 242 32 10 19 243 245] \
  80.     #(  ) ) >
  81.  
  82. <primitive 112 temp 20        " < " \
  83.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 199 248 \
  84.  4 242 32 10 19 243 245] \
  85.     #(  ) ) >
  86.  
  87. <primitive 112 temp 21        " = " \
  88.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 201 248 \
  89.  4 242 32 10 19 243 245] \
  90.     #(  ) ) >
  91.  
  92. <primitive 112 temp 22        " , " \
  93.     #( #[ 32 32 33 250 2 6 247 3 33 248 3 242 33 169 250 \
  94.  2 103 243 245] \
  95.     #(  ) ) >
  96.  
  97. <primitive 98 #String \
  98.     <primitive 97 #String #ArrayedCollection #\smalltlk\prelude\string.st \
  99.     #(  ) \
  100.     #( #sameAs: #size #printNoReturn #print #printString #printAt: #new: #deepCopy #copyFrom:length: #copyFrom:to: #compareError #at:put: #at: #asSymbol #asFloat #asInteger #> #>= #<= #< #= #,  ) \
  101.     temp 3 5 > >
  102.  
  103.